home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 5 / Apprentice-Release5.iso / Source Code / Think Class Libraries / SAT-TCL 1.0b2 / SAT-TCLBouncingDemo ƒ / BDGlobals.p < prev    next >
Encoding:
Text File  |  1996-06-05  |  450 b   |  22 lines  |  [TEXT/PJMM]
  1. {****************************************************}
  2. {}
  3. {    BDGlobals.p                                                                                                    }
  4. {}
  5. {    Global variables for the SAT-TCL Bouncing Demonstration which need to be    }
  6. {    available to the sprites also.                                                                            }
  7. {}
  8. {    Copyright © 1996 by Patrick C Hew. All rights reserved.                                }
  9. {}
  10. {****************************************************}
  11.  
  12.  
  13. unit BDGlobals;
  14.  
  15. interface
  16.  
  17.     const
  18.         kindBouncer = 1;
  19.  
  20. implementation
  21.  
  22. end. { BDGlobals }